home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / pc / shared.dir / 01972_Script_turnOffPuppets < prev    next >
Text File  |  1995-09-13  |  739b  |  31 lines
  1. global gNewMarker, gBtn16, gBtn17, gBtn18,gQuest,gTheHelpIsOn
  2.  
  3. on TurnOffPuppets pDontKillSound
  4.   WatchCursor
  5.   if objectp(gQuest) then resetQuestionMark(gQuest) --APN 6/29
  6.   repeat with x = 2 to 28
  7.     puppetsprite x, false
  8.   end repeat
  9.   repeat with x = 39 to 43
  10.     puppetsprite x, false
  11.   end repeat
  12.   if voidp(pDontKillSound) then puppetsound 0 --APN 7/19
  13.   sound stop 3
  14.   sound stop 2
  15.   if gTheHelpIsOn = 1 then
  16.     set gTheHelpIsOn = 0
  17.     TurnOffHelpSounds
  18.   end if
  19.   if ObjectP(gBtnTOC1) then
  20.     TOCKill
  21.   end if
  22.   if ObjectP (gBtn16) then
  23.     HideControl (gBtn16)
  24.   end if
  25.   if objectp (gBtn17) then
  26.     HideControl (gBtn17)
  27.   end if
  28.   if objectp (gBtn18) then
  29.     HideControl (gBtn18)
  30.   end if
  31. end